home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / s / startup-sequence3.0 < prev    next >
Text File  |  1995-03-28  |  2KB  |  79 lines
  1.     ;assign newcon: con:
  2.     cdpd2:3.0/c/assign devs: cdpd2:3.0/devs 
  3.     cdpd2:3.0/c/assign sys: cdpd2:3.0
  4.     cdpd2:3.0/c/assign c: cdpd2:3.0/c
  5.     cdpd2:3.0/c/assign l: cdpd2:3.0/l
  6.     cdpd2:3.0/c/assign s: cdpd2:3.0/s 
  7.     cdpd2:3.0/c/assign libs: cdpd2:3.0/libs
  8.     cdpd2:3.0/c/assign fonts: cdpd2:3.0/fonts
  9.     cdpd2:3.0/c/assign Utilities: cdpd2:3.0/Utilities  
  10.     cdpd2:3.0/c/assign prefs: cdpd2:3.0/prefs
  11.     cdpd2:3.0/c/makedir ram:Clipboards ram:env ram:env/sys
  12.     cdpd2:3.0/c/copy >NIL: ENVARC: ram:env all quiet noreq
  13.     c:assign ENV: ram:env
  14.     c:assign CLIPS: ram:clipboards
  15.     resident >NIL: cdpd2:3.0/c/Execute pure add
  16.     ;mount newcon:
  17.  
  18. ; $VER: startup-sequence 39.9 (9.8.92)
  19.  
  20. C:SetPatch QUIET
  21. C:Version >NIL:
  22. ;C:AddBuffers >NIL: DF0: 15
  23. FailAt 21
  24.  
  25. C:MakeDir >nil: RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
  26. C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
  27.  
  28. Resident >NIL: C:Assign PURE
  29. Resident >NIL: C:Execute PURE
  30.  
  31. c:Assign >NIL: ENV: RAM:ENV
  32. c:Assign >NIL: T: RAM:T
  33. c:Assign >NIL: CLIPS: RAM:Clipboards
  34. c:Assign >NIL: REXX: S:
  35. c:Assign >NIL: PRINTERS: DEVS:Printers
  36. c:Assign >NIL: KEYMAPS: DEVS:Keymaps
  37. c:Assign >NIL: LOCALE: SYS:Locale
  38. c:Assign >NIL: LIBS: SYS:Classes ADD
  39. c:Assign >NIL: HELP: LOCALE:Help DEFER
  40.  
  41. IF NOT EXISTS SYS:Fonts
  42.   c:Assign FONTS:
  43. EndIF
  44.  
  45. c:BindDrivers
  46. C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
  47.  
  48. IF EXISTS DEVS:Monitors
  49.   IF EXISTS DEVS:Monitors/VGAOnly
  50.     DEVS:Monitors/VGAOnly
  51.   EndIF
  52.  
  53.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  54.   c:Execute T:M
  55.   C:Delete >NIL: T:M
  56. EndIF
  57.  
  58. SetEnv Workbench $Workbench
  59. SetEnv Kickstart $Kickstart
  60. UnSet Workbench
  61. UnSet Kickstart
  62.  
  63. C:IPrefs
  64.  
  65. C:ConClip
  66.  
  67. Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:Tools SYS:Tools/Commodities
  68.  
  69. assign >NIL: CDPD-Custom: exists
  70. if not warn
  71.     execute CDPD-Custom:s/CD-Environment
  72. endif
  73.  
  74. Resident Execute REMOVE
  75. Resident Assign REMOVE
  76.  
  77. C:LoadWB
  78. EndCLI >NIL:
  79.